home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / ohlutil.zip / EACCESS.C < prev    next >
C/C++ Source or Header  |  1990-05-31  |  4KB  |  148 lines

  1. /* eaccess -- check if effective user id can access file
  2.    Copyright (C) 1990 Free Software Foundation, Inc.
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 1, or (at your option)
  7.    any later version.
  8.  
  9.    This program is distributed in the hope that it will be useful,
  10.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; if not, write to the Free Software
  16.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  17.  
  18. /* David MacKenzie and Torbjorn Granlund */
  19.  
  20. #include <sys/types.h>
  21. #include <sys/stat.h>
  22. #ifdef _POSIX_SOURCE
  23. #include <unistd.h>
  24. #else
  25. #include <sys/param.h>
  26. #endif
  27. #include <errno.h>
  28. #if defined(EACCES) && !defined(EACCESS)
  29. #define EACCESS EACCES
  30. #endif
  31.  
  32. #ifndef _POSIX_SOURCE
  33. #define F_OK 0
  34. #define X_OK 1
  35. #define W_OK 2
  36. #define R_OK 4
  37. #endif
  38.  
  39. #ifndef STDC_HEADERS
  40. extern int errno;
  41. #endif
  42.  
  43. /* The user's effective user id. */
  44. static int euid;
  45.  
  46. /* The user's effective group id. */
  47. static int egid;
  48.  
  49. /* NGROUPS is defined in sys/param.h on systems with multiple groups. */
  50. #ifdef NGROUPS
  51. static int in_group ();
  52.  
  53. /* Array of group id's that the user is in. */
  54. static int groups[NGROUPS];
  55.  
  56. /* The number of valid elements in `groups'. */
  57. static int ngroups;
  58. #endif
  59.  
  60. /* Nonzero if the other static variables have valid values. */
  61. static int initialized = 0;
  62.  
  63. /* Return 0 if the user has permission of type MODE on file PATH;
  64.    otherwise, return -1 and set `errno' to EACCESS.
  65.    Like access, except that it uses the effective user and group
  66.    id's instead of the real ones, and it does not check for read-only
  67.    filesystem, text busy, etc. */
  68.  
  69. int
  70. eaccess (path, mode)
  71.      char *path;
  72.      int mode;
  73. {
  74.   struct stat stats;
  75.  
  76.   if (stat (path, &stats))
  77.     return -1;
  78.  
  79.   return eaccess_stat (&stats, mode);
  80. }
  81.  
  82. /* Like eaccess, except that a pointer to a filled-in stat structure
  83.    describing the file is provided instead of a filename. */
  84.  
  85. int
  86. eaccess_stat (statp, mode)
  87.      struct stat *statp;
  88.      int mode;
  89. {
  90.   int granted;
  91.  
  92.   mode &= (X_OK | W_OK | R_OK);    /* Clear any bogus bits. */
  93.  
  94.   if (mode == F_OK)
  95.     return 0;            /* The file exists. */
  96.  
  97.   if (initialized == 0)
  98.     {
  99.       initialized = 1;
  100.       euid = geteuid ();
  101.       egid = getegid ();
  102. #ifdef NGROUPS
  103.       ngroups = getgroups (NGROUPS, groups);
  104. #endif
  105.     }
  106.   
  107.   /* The super-user can read and write any file, and execute any file
  108.      that anyone can execute. */
  109.   if (euid == 0 && ((mode & X_OK) == 0 || (statp->st_mode & 0111)))
  110.     return 0;
  111.   if (euid == statp->st_uid)
  112.     granted = (statp->st_mode & (mode << 6)) >> 6;
  113.   else if (egid == statp->st_gid
  114. #ifdef NGROUPS
  115.        || in_group (statp->st_gid)
  116. #endif
  117.        )
  118.     granted = (statp->st_mode & (mode << 3)) >> 3;
  119.   else
  120.     granted = (statp->st_mode & mode);
  121.   if (granted == mode)
  122.     return 0;
  123.   errno = EACCESS;
  124.   return -1;
  125. }
  126.  
  127. #ifdef NGROUPS
  128. static int
  129. in_group (gid)
  130.      int gid;
  131. {
  132.   int i;
  133.  
  134.   for (i = 0; i < ngroups; i++)
  135.     if (gid == groups[i])
  136.       return 1;
  137.   return 0;
  138. }
  139. #endif
  140.  
  141. #ifdef TEST
  142. main (argc, argv)
  143.      char **argv;
  144. {
  145.   printf ("%d\n", eaccess (argv[1], atoi (argv[2])));
  146. }
  147. #endif
  148.